load "header.plt"

set size 1, 1

xmin=0; xmax=10*pi
ymin=0; ymax=1000
set xrange [xmin:xmax]
set yrange [ymin:ymax]
set autoscale y


set key outside
f(n) = abs(n * sin(n))

set output "nsenn.cgm"
plot [n=xmin:xmax] 0 lt 4, f(n) title "n sen n" lt 2, n lt 4

load "footer.plt"
# EOF
